home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue25 / speed / UnitStartTwoThreads.dfm / UnitStartTwoThreads.txt
Encoding:
Text File  |  1997-05-18  |  1.7 KB  |  87 lines
  1. object FrTwoThreads: TFrTwoThreads
  2.   Left = 93
  3.   Top = 94
  4.   Width = 564
  5.   Height = 401
  6.   Caption = 'Two Threads'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   Position = poScreenCenter
  12.   OnCreate = FormCreate
  13.   OnDestroy = FormDestroy
  14.   OnResize = FormResize
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object Panel1: TPanel
  18.     Left = 0
  19.     Top = 0
  20.     Width = 556
  21.     Height = 153
  22.     Align = alTop
  23.     Caption = 'Panel1'
  24.     TabOrder = 0
  25.     object Memo1: TMemo
  26.       Left = 8
  27.       Top = 8
  28.       Width = 257
  29.       Height = 105
  30.       Lines.Strings = (
  31.         'select * from customer,customer,customer')
  32.       TabOrder = 0
  33.     end
  34.     object Memo2: TMemo
  35.       Left = 280
  36.       Top = 8
  37.       Width = 257
  38.       Height = 105
  39.       Lines.Strings = (
  40.         'select * from country,country,country')
  41.       TabOrder = 1
  42.     end
  43.     object BuClose: TButton
  44.       Left = 280
  45.       Top = 120
  46.       Width = 75
  47.       Height = 25
  48.       Caption = 'Close'
  49.       ModalResult = 1
  50.       TabOrder = 2
  51.     end
  52.     object BuStartTwoThreads: TButton
  53.       Left = 8
  54.       Top = 120
  55.       Width = 121
  56.       Height = 25
  57.       Caption = 'Start Two Threads'
  58.       TabOrder = 3
  59.       OnClick = BuStartTwoThreadsClick
  60.     end
  61.   end
  62.   object DBGrid1: TDBGrid
  63.     Left = 0
  64.     Top = 153
  65.     Width = 249
  66.     Height = 221
  67.     Align = alLeft
  68.     TabOrder = 1
  69.     TitleFont.Color = clWindowText
  70.     TitleFont.Height = -11
  71.     TitleFont.Name = 'MS Sans Serif'
  72.     TitleFont.Style = []
  73.   end
  74.   object DBGrid2: TDBGrid
  75.     Left = 276
  76.     Top = 153
  77.     Width = 280
  78.     Height = 221
  79.     Align = alRight
  80.     TabOrder = 2
  81.     TitleFont.Color = clWindowText
  82.     TitleFont.Height = -11
  83.     TitleFont.Name = 'MS Sans Serif'
  84.     TitleFont.Style = []
  85.   end
  86. end
  87.